home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Family Forum 256
/
SOMC Family Forum 256 - Disc 2.iso
/
AOL_V2.7IN
/
Web Browser v1.1.rsrc
/
TEXT_257_Landscape PS.txt
< prev
next >
Wrap
Text File
|
1996-04-12
|
605b
|
14 lines
%!-Adobe-1.0
%%Title: landscape.ps
%%Creator: Amanda Walker <amanda@intercon.com>
%%CreationDate: 5 April 1990
/s 256 string def
72 720 translate -90 rotate 0 468 moveto /Courier findfont [8 0 0 7 0 0] makefont setfont
/spacewidth ( ) stringwidth pop def{ currentfile s readline { gsave
{ ( ) search exch show not { exit } if
pop currentpoint exch spacewidth div .49 add cvi
8 add dup 8 mod sub spacewidth mul exch moveto } loop
grestore 0 -7 rmoveto currentpoint exch pop 7 lt {
showpage 72 720 translate -90 rotate 0 468 moveto } if
} { currentpoint exch pop 468 lt { showpage } if exit } ifelse } loop